Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Data
Imports System.Drawing
Imports System.Linq
Imports System.Text
Imports System.Windows.Forms

Public Partial Class MDIParent1
	Inherits Form

	Public Sub New()
		InitializeComponent()
		Dim individualsForm1 As Form = New IndividualsForm()
		individualsForm1.MdiParent = Me
		individualsForm1.Show()

		Dim dbfSamplesForm1 As Form = New DbfSamples()
		dbfSamplesForm1.MdiParent = Me
		dbfSamplesForm1.Show()
	End Sub



	Private Sub ExitToolsStripMenuItem_Click(sender As Object, e As EventArgs)
		Me.Close()
	End Sub


	Private Sub CascadeToolStripMenuItem_Click(sender As Object, e As EventArgs)
		LayoutMdi(MdiLayout.Cascade)
	End Sub

	Private Sub TileVerticalToolStripMenuItem_Click(sender As Object, e As EventArgs)
		LayoutMdi(MdiLayout.TileVertical)
	End Sub

	Private Sub TileHorizontalToolStripMenuItem_Click(sender As Object, e As EventArgs)
		LayoutMdi(MdiLayout.TileHorizontal)
	End Sub

	Private Sub ArrangeIconsToolStripMenuItem_Click(sender As Object, e As EventArgs)
		LayoutMdi(MdiLayout.ArrangeIcons)
	End Sub

	Private Sub CloseAllToolStripMenuItem_Click(sender As Object, e As EventArgs)
		For Each childForm As Form In MdiChildren
			childForm.Close()
		Next
	End Sub
End Class
